home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 April / EnigmA AMIGA RUN 17 (1997)(G.R. Edizioni)(IT)[!][issue 1997-04][EAR-CD].iso / EARCD / util / pack / xpk_Source.lha / xpk_Source / xpkmaster / Test / PrintFlags.c < prev    next >
C/C++ Source or Header  |  1996-12-06  |  644b  |  44 lines
  1. #include <xpk/xpk.h>
  2. #include <pragma/dos_lib.h>
  3.  
  4. /* Includesheader
  5.  
  6.     Name:        PrintFlags.c
  7.     Versionstring:    $VER: PrintFlags.c 1.0 (06.12.96)
  8.     Author:        SDI
  9.     Distribution:    PD
  10.     Description:    prints flags
  11.  
  12.  1.1   06.12.96 : build with GetXpkSubLibData.c code
  13. */
  14.  
  15. ULONG PrintFlag(ULONG *data, ULONG flag, STRPTR str)
  16. {
  17.   if(*data & flag)
  18.   {
  19.     PutStr(str);
  20.     *data ^= flag;
  21.     if(*data)
  22.     {
  23.       PutStr("|");
  24.       return 2;
  25.     }
  26.     return 1;
  27.   }
  28.   return 0;
  29. }
  30.  
  31. ULONG PrintEndFlag(ULONG data, ULONG origdata)
  32. {
  33.   if(data)
  34.   {
  35.     VPrintf("%ld\n",&data);
  36.     return 1;
  37.   }
  38.   else if(!origdata)
  39.     PutStr("0");
  40.   PutStr("\n");
  41.   return 0;
  42. }
  43.  
  44.